perm filename TEST[901,BGB] blob sn#129619 filedate 1974-11-12 generic text, type T, neo UTF8
00100	TITLE  TEST
00200	EXTERNAL PASS3,PASS4,PASS5,PASS6,NUMTRI,TRITAB
00210	
00300	INTERNAL STOP,GO,PATCH
00400	GO:	JUMP
00410	MOVEI 4
00420	MOVEM NUMTRI
00500		JSR PASS3
00510	MOVE TRITAB+1
00520	MOVEM TRITAB
00530	MOVE TRITAB+2
00540	MOVEM TRITAB+1
00550	MOVEI 2
00560	MOVEM NUMTRI
00600		JSR PASS4
00700		JSR PASS5
00800		JSR PASS6
00900	STOP:	HALT
00940	PATCH:
01000	BLOCK 100
01100	END GO